Style fix

diff --git a/src/process.c b/src/process.c
index 10c79ab14a3f4a67fdc34cecf32881e84dd195f8..14be3b0f9c333b2097397c80bddfd7c519a5b8ed 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -3066,13 +3066,14 @@ void connect_network_socket (Lisp_Object proc, Lisp_Object ip_addresses)
       {
        Lisp_Object params = contact, key, val;
 
-       while (!NILP (params)) {
-         key = XCAR (params);
-         params = XCDR (params);
-         val = XCAR (params);
-         params = XCDR (params);
-         optbits |= set_socket_option (s, key, val);
-       }
+       while (!NILP (params))
+         {
+           key = XCAR (params);
+           params = XCDR (params);
+           val = XCAR (params);
+           params = XCDR (params);
+           optbits |= set_socket_option (s, key, val);
+         }
       }
 
       if (p->is_server)